home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / BT510.ARJ / PATCH510.BAT < prev    next >
DOS Batch File  |  1992-01-13  |  6KB  |  287 lines

  1. echo off
  2. CLS
  3. echo *** MAKE SURE THAT YOU USE THE ORIGINAL (UNPATCHED) RELEASED VERSION
  4. echo     OF THE PRODUCT YOU ARE PATCHING.   PATCHING AN ALREADY PATCHED COPY
  5. echo     MAY CAUSE UNPREDICTABLE ERRORS.
  6. echo  
  7. echo  
  8. echo     This batch file patches all NETWARE BTRIEVE PRODUCTS
  9. echo     ** EXCEPT for BTRIEVE.NLM v5.11- which shipped with NETWARE 3.1 **
  10. echo  
  11. echo     If you are patching NETWARE v3.1 BTRIEVE PRODUCTS (specifically
  12. echo     BTRIEVE.NLM, BROUTER.NLM, and BREQUEST.EXE v5.11), please use
  13. echo     PATCH511.BAT.
  14. echo  
  15. PAUSE
  16. IF  %2! == !     GOTO TESTNEXT
  17. IF  %2  == VAP   GOTO TESTNEXT
  18. IF  %2  == vap   GOTO TESTNEXT
  19. IF  %2  == NLM   GOTO TESTNEXT
  20. IF  %2  == nlm   GOTO TESTNEXT
  21. IF  %2  == DOS   GOTO TESTNEXT
  22. IF  %2  == dos   GOTO TESTNEXT
  23. IF  %2  == LOC   GOTO TESTNEXT
  24. IF  %2  == loc   GOTO TESTNEXT
  25. IF  %2  == REQ   GOTO TESTNEXT
  26. IF  %2  == req   GOTO TESTNEXT
  27. GOTO PARAM
  28. ::
  29. :TESTNEXT
  30. IF  %1! == ! GOTO PARAM
  31. SET BTR_VER=510
  32. SET BTR_NWV=NetWare_3.0
  33. IF  %1 == BTRIEVE  GOTO BTRIEVE
  34. IF  %1 == btrieve  GOTO BTRIEVE
  35. IF  %1 == BSERVER  GOTO BTRIEVE
  36. IF  %1 == bserver  GOTO BTRIEVE
  37. IF  %1 == BROUTER  GOTO BROUTER
  38. IF  %1 == brouter  GOTO BROUTER
  39. IF  %1 == BREQUEST GOTO BREQUES
  40. IF  %1 == brequest GOTO BREQUES
  41. IF  %1 == BTRCALLS GOTO BTRCALL
  42. IF  %1 == btrcalls GOTO BTRCALL
  43. IF  %1 == WBTRCALL GOTO WINDOWS
  44. IF  %1 == wbtrcall GOTO WINDOWS
  45. IF  %1 == BTRTOOLS GOTO WINDOWS
  46. IF  %1 == btrtools GOTO WINDOWS
  47. IF  %1 == BUTIL    GOTO BUTIL
  48. IF  %1 == butil    GOTO BUTIL
  49. GOTO PARAM
  50. ::
  51. :BTRIEVE
  52. ::
  53. ::  BEGIN BTRIEVE PATCHES
  54. ::
  55. ::  N L M   3.0
  56. SET BTR_FILE=%1.NLM
  57. SET BTR_ORG=%1.ORG
  58. SET BTR_PAT=BPATNLM.%BTR_VER%
  59. IF %2! == !    GOTO NEEDPRM
  60. IF %2 == NLM   GOTO NEXTBTR
  61. IF %2 == nlm   GOTO NEXTBTR
  62. ::
  63. ::  L O C A L
  64. IF %1 == BSERVER GOTO BTRVAP
  65. IF %1 == bserver GOTO BTRVAP
  66. SET BTR_FILE=%1.EXE
  67. SET BTR_ORG=%1.DOS
  68. SET BTR_PAT=BPAT%2.51A
  69. SET BTR_VER=510A
  70. IF %2! == !  GOTO NEEDPRM
  71. IF %2 == DOS GOTO PATCH
  72. IF %2 == dos GOTO PATCH
  73. GOTO NOTPKG
  74. ::
  75. ::  V A P
  76. :BTRVAP
  77. SET BTR_FILE=%1.VAP
  78. SET BTR_PAT=BPATVAP.%BTR_VER%
  79. SET BTR_NWV=*
  80. IF %1 == BTRIEVE GOTO NOTPKG
  81. IF %1 == btrieve GOTO NOTPKG
  82. IF %2! == !  GOTO NEEDPRM
  83. IF %2 == VAP GOTO PATCH
  84. IF %2 == vap GOTO PATCH
  85. GOTO NEEDPRM
  86. ::
  87. :NEXTBTR
  88. IF %1 == BSERVER GOTO VAPONLY
  89. IF %1 == bserver GOTO VAPONLY
  90. GOTO PATCH
  91. ::
  92. ::  END BTRIEVE PATCHES
  93. ::
  94. ::  BEGIN BROUTER PATCHES
  95. ::
  96. :BROUTER
  97. ::
  98. ::  N L M  3.0
  99. IF %2! == !    GOTO NEEDPRM
  100. IF %2 == NLM   GOTO NOTPKG
  101. IF %2 == nlm   GOTO NOTPKG
  102. ::
  103. ::  V A P
  104. SET BTR_FILE=%1.VAP
  105. SET BTR_ORG=%1V.ORG
  106. SET BTR_PAT=BPATRTR.%BTR_VER%
  107. SET BTR_NWV=*
  108. IF %2 == VAP GOTO PATCH
  109. IF %2 == vap GOTO PATCH
  110. GOTO NOTPKG
  111. ::
  112. ::  END BROUTER PATCHES
  113. ::
  114. ::  BEGIN BREQUEST PATCHES
  115. ::
  116. :BREQUES
  117. ::
  118. ::  N L M  3.0
  119. SET BTR_FILE=%1.EXE
  120. SET BTR_ORG=%1.ORG
  121. SET BTR_PAT=BPATREQ.%BTR_VER%
  122. IF %2! == !    GOTO NEEDPRM
  123. IF %2 == NLM   GOTO PATCH
  124. IF %2 == nlm   GOTO PATCH
  125. ::
  126. ::  V A P
  127. SET BTR_PAT=BPATREQ.%BTR_VER%
  128. SET BTR_NWV=*
  129. IF %2! == !  GOTO NEEDPRM
  130. IF %2 == VAP GOTO PATCH
  131. IF %2 == vap GOTO PATCH
  132. GOTO NOTPKG
  133. ::
  134. ::
  135. ::  END BREQUEST PATCHES
  136. ::
  137. ::  BEGIN OS/2 PATCHES
  138. ::
  139. :BTRCALL
  140. ::
  141. ::  O S / 2   R E Q
  142. SET BTR_FILE=%1.DLL
  143. SET BTR_ORG=%1.ORG
  144. SET BTR_PAT=BPATREQO.%BTR_VER%
  145. IF %2! == !  GOTO NEEDPRM
  146. IF %2 == REQ GOTO PATCH
  147. IF %2 == req GOTO PATCH
  148. ::
  149. ::  O S / 2   L O C A L
  150. SET BTR_ORG=%1.OS2
  151. SET BTR_PAT=BPATOS2.%BTR_VER%
  152. IF %2! == !  GOTO NEEDPRM
  153. IF %2 == LOC GOTO PATCH
  154. IF %2 == loc GOTO PATCH
  155. GOTO NOTPKG
  156. ::
  157. ::  END OS/2 PATCHES
  158. ::
  159. ::  BEGIN WINDOWS PATCHES
  160. ::
  161. :WINDOWS
  162. ::
  163. ::  W B T R C A L L
  164. SET BTR_FILE=%1.DLL
  165. SET BTR_ORG=%1.ORG
  166. SET BTR_PAT=BPATWIN.%BTR_VER%
  167. IF %1 == WBTRCALL GOTO PATCH
  168. IF %1 == wbtrcall GOTO PATCH
  169. ::
  170. ::  B T R T O O L S
  171. SET BTR_FILE=%1.EXE
  172. SET BTR_PAT=WTOOLPAT.%BTR_VER%
  173. GOTO PATCH
  174. ::
  175. ::  END WINDOWS PATCHES
  176. ::
  177. ::  BEGIN BUTIL PATCHES
  178. ::
  179. :BUTIL
  180. ::
  181. SET BTR_FILE=%1.EXE
  182. SET BTR_ORG=%1.ORG
  183. SET BTR_PAT=BPATUT.%BTR_VER%
  184. GOTO PATCH
  185. ::
  186. ::  END BUTIL PATCHES
  187. ::
  188. ::  BEGIN PATCHING FILES
  189. ::
  190. :PATCH
  191. IF NOT EXIST PI.EXE GOTO NOPI
  192. IF NOT EXIST %BTR_PAT% GOTO NOPAT
  193. IF NOT EXIST %BTR_FILE% GOTO NOFILE
  194. IF NOT EXIST %BTR_ORG% REN %BTR_FILE% %BTR_ORG%
  195. IF EXIST %BTR_FILE% DEL %BTR_FILE%
  196. :INPATCH
  197. echo  
  198. echo %BTR_NWV% %BTR_FILE% VERSION %BTR_VER% ** PATCHING ..........
  199. echo  
  200. COPY %BTR_ORG% %1
  201. PI %1 %BTR_PAT%
  202. REN %1 %BTR_FILE%
  203. GOTO FIXDONE
  204. ::
  205. :NOPAT
  206. echo  
  207. echo CANNOT FIND %BTR_PAT%
  208. GOTO END
  209. ::
  210. :NOPI
  211. echo  
  212. echo CANNOT FIND PI.EXE
  213. echo  
  214. echo The Novell Patch Install Utility (PI.EXE) is required to install
  215. echo the patches for this product.  Please copy PI.EXE to the directory
  216. echo you are working in............................................
  217. GOTO END
  218. ::
  219. :NOFILE
  220. IF EXIST %BTR_ORG% GOTO INPATCH
  221. echo  
  222. echo CANNOT FIND %BTR_FILE%
  223. GOTO END
  224. ::
  225. :NEEDPRM
  226. echo  
  227. echo * %1 *  COMMAND LINE PARAMETER INVALID
  228. echo PLEASE USE THE PARAMETERS IN THE { } NEXT TO THE FILENAME YOU WISH TO
  229. echo PATCH .......
  230. echo  
  231. GOTO PARAM
  232. ::
  233. :NLMONLY
  234. echo  
  235. echo %1 IS ONLY FOR THE NLM PRODUCTS - NOT %2 VERSION %BTR_VER% PRODUCTS
  236. GOTO END
  237. ::
  238. :VAPONLY
  239. echo  
  240. echo %1 IS ONLY FOR THE VAP PRODUCTS - NOT %2 VERSION %BTR_VER% PRODUCTS
  241. GOTO END
  242. ::
  243. :NOTPKG
  244. echo  
  245. echo Parameters incorrect for %1 using %2
  246. echo  
  247. echo Either incorrect parameters were specified or
  248. echo  
  249. echo %1 for %2 is NOT part of the %BTR_NWV% PRODUCT PACKAGE
  250. echo  
  251. GOTO END
  252. ::
  253. :PARAM
  254. IF %1! == ! CLS
  255. IF %2? == ! CLS
  256. echo THE FORMAT IS:
  257. echo  
  258. echo PATCH510 [filename] [type]
  259. echo  
  260. echo WHERE [filename] IS:       BTRIEVE      { NLM, DOS            }
  261. echo                            BSERVER      { VAP                 }
  262. echo                            BROUTER      { VAP                 }
  263. echo                            BREQUEST     { VAP, NLM            }
  264. echo                            BTRCALLS     { LOC, REQ            }
  265. echo                            WBTRCALL
  266. echo                            BTRTOOLS
  267. echo                            BUTIL        { D O S  version only }
  268. echo  
  269. echo AND   [type]     IS:       NLM
  270. echo                            VAP
  271. echo                            DOS
  272. echo                            LOC          { Local       }
  273. echo                            REQ          { Requester   }
  274. GOTO END
  275. ::
  276. :FIXDONE
  277. echo  
  278. echo BTRIEVE PRODUCT FOR %2 VERSION %BTR_VER% ** PATCH COMPLETE **
  279. echo  
  280. ::
  281. :END
  282. SET BTR_FILE=
  283. SET BTR_ORG=
  284. SET BTR_PAT=
  285. SET BTR_VER=
  286. SET BTR_NWV=
  287.